home *** CD-ROM | disk | FTP | other *** search
/ Megahits 3 / Megahits 3 (1994)(GTI - Rhein-Main-Soft)(DE)[!].iso / transfer / floppy.dms / floppy.adf / Sernet.Install < prev    next >
Text File  |  1994-06-16  |  4KB  |  120 lines
  1. ; This is my first attempt at using the CBM Installer program
  2. ; Based on the Parbench installer script
  3.  
  4. (welcome (message "\n\n\nPLEASE NOTE\n\n\nThis installer script will NOT work if you booted from this floppy!")
  5. )
  6. (transcript "SerNet installation on  \"SYS:ParNET\"...")    ;Begin to hate
  7.                            ;parenthesis..
  8. (complete 0)
  9.  
  10.  
  11. (makedir "SYS:SerNET"                     ;Begin Makedir
  12.    (prompt "\n\n\n\nHit PROCEED to create SYS:SerNET\n\n(For Addtional Information on this step hit HELP.)")         ;
  13.    (help "\n  SerNet relies on there being a Drawer called SYS:SerNET in order for it to install properly. This drawer must exist in order for the remainder of this script to function.")
  14.    (infos)                       ;
  15.    (confirm)                     ;
  16. )                          ;End Makedir
  17.  
  18. (makedir "SYS:DNET"                    ;Begin Makedir
  19.    (prompt "\n\n\n\nHit PROCEED to create SYS:DNET\n\n(For Addtional Information on this step hit HELP.)")        ;
  20.    (help "\n  SerNet relies on there being a Drawer called SYS:DNET in order for it to install properly. This drawer must exist in order for the remainder of this script to function.")                       ;
  21.    (confirm)                     ;
  22. )                          ;End Makedir
  23.  
  24.  
  25.  
  26. (complete 10)
  27.  
  28. ; **** Ok Ok, so its Really Clumsy but I don't know how to do multiple
  29. ; **** operators without it shifting to ELSE!!! Grrr...
  30.                
  31. (copyfiles                    
  32.    (Prompt "For Additional Information on these files hit HELP.")              
  33.    (source "WS:SerNet")          
  34.    (dest "SYS:SerNET/")             
  35.    (files)                    
  36.    (infos)                    
  37.    (all)
  38. )                          
  39.  
  40.                      
  41. (copyfiles                    
  42.    (Prompt "For Additional Information on this file hit HELP.") 
  43.    (source "WS:DNET")            
  44.    (dest "SYS:DNET/")               
  45.    (files)
  46.    (infos)                    
  47.    (pattern "#?")
  48. )                          
  49.  
  50. (Complete 35)
  51.                      
  52. (copyfiles                    
  53.    (Prompt "For Additional Information on these files hit HELP.")              
  54.    (source "WS:s")            
  55.    (dest "SYS:s/")               
  56.    (files)                                         
  57.    (pattern "Dnet.#?")              
  58. )                          
  59.  
  60. (Complete 45)
  61.  
  62. (copyfiles                    
  63.    (Prompt "For Additional Information on these files hit HELP.")              
  64.    (source "WS:s/NETDNET-SERVER")            
  65.    (dest "SYS:s/")                           
  66. )                          
  67.  
  68. (Complete 55)
  69.  
  70. (copyfiles
  71.    (Prompt "\n\n\nHit PROCEED to copy 'Serial.Device' to SYS:\n\n(For Additional Information on this step hit HELP.)")
  72.    (help "\nSernet seems to prefer an old version of the Serial.Device\n\nThe installer will copy your original version\n\ninto the directory 'Serial.Device.Original'\n\nand copy across an old version.")
  73.    (source "Sys:Devs/Serial.Device")
  74.    (dest "Sys:Devs/Serial.Device.Original")
  75.    (files)
  76.    (confirm)
  77. )
  78.  
  79. (copyfiles
  80.    (source "WS:Devs/Serial.Device")
  81.    (dest "SYS:Devs/")
  82.    (files)
  83. )
  84.  
  85. (complete 65)
  86.  
  87. (copyfiles                    
  88.    (Prompt "For Addtional Information on these files hit HELP.")              
  89.    (source "WS:l/Dpipe-Handler")           
  90.    (dest "SYS:l/")               
  91.    (files)                                                  
  92. )                          
  93.  
  94. (copyfiles                    
  95.    (Prompt "For Addtional Information on these files hit HELP.")              
  96.    (source "WS:l/Null-Handler")           
  97.    (dest "SYS:l/")               
  98.    (files)                                                  
  99. )                          
  100.  
  101. (copyfiles                    
  102.    (Prompt "For Addtional Information on these files hit HELP.")              
  103.    (source "WS:l/NetDNet-Handler")           
  104.    (dest "SYS:l/")               
  105.    (files)                                                  
  106. )                          
  107.  
  108. (complete 85)
  109. (copylib
  110.    (prompt "Copying Dres.library to Libs: directory.")
  111.    (help @copylib-help)
  112.    (source "WS:libs/Dres.library")
  113.    (dest "Libs:")
  114.    (confirm)
  115. )
  116.  
  117.  
  118. (complete 100)
  119. (exit "Weird Science")
  120.